home *** CD-ROM | disk | FTP | other *** search
/ JCSM Shareware Collection 1993 November / JCSM Shareware Collection - 1993-11.iso / cl720 / eblplusj.lzh / BATDOC.BAT < prev    next >
DOS Batch File  |  1990-11-01  |  20KB  |  507 lines
  1. bat * Loading HELP and DOCUMENTATION .....
  2.  
  3. *           Written 10/5/83 through 01/15/90
  4. *   (c) Copyright 1983 to 1990 by Seaware Corp. all rights reserved.
  5. *    This batch file REQUIRES EBL PLUS for proper execution!
  6.  
  7.          **** NOTE! NOTE! NOTE! NOTE! ****
  8.  RAM    |* <-----Change 'RAM' to 'BIOS' if PC isn't 100% IBM Compatible!
  9.  
  10.  if %G = .goto. then %G = | goto -%F
  11.  else %F =
  12.  else goto -line0
  13.  
  14.  
  15. -header * Routine prints general purpose header for help text
  16.     stack.purge            |*  remove any pre-typed keystrokes.
  17.     %n = %i $ 1 ( %i # - 2 ) & . & ( %i $ ( %i # - 1 ) 2 ) |* extract section # from page #
  18.     color( white on black )
  19.     cls
  20.     color( white on cyan  )
  21.     window( 1, 1, 79, 3, Combo)
  22.     begtype
  23.  \%H                     Page \%n
  24.  
  25. \07    Press:  PGDN for next page,   PGUP for prev page,  HOME for main menu.
  26. end
  27.     color( white on black)
  28.     colorchar ~ as color(yellow on black)
  29.     window( 1, 5, 79, 25, Combo)
  30.     return
  31.  
  32. -scroll * Routine accepts key for scrolling help text
  33.     %e = 0
  34.     inkey %k
  35.     if %k = KEY("Ctrl-C") then goto -opt0
  36.     if %k = KEY(Esc)  %i = 0      | goto -line0
  37.     if %k = KEY(Home) %i = 0      | goto -line0
  38.     if %k = KEY(Pgup) %i = %i - 1 | cls | %F = line%i | goto -%F
  39.     if %k = KEY(Pgdn) %i = %i + 1 | cls | %F = line%i | goto -%F
  40.     goto -scroll |* ignore any other key.
  41.  
  42. -line1404
  43. -line99
  44. -line0
  45.     %e = 0
  46.     color white on black
  47.     cls begtype
  48. \1F╔════════════════ BATDOC ═══════════════════╗\07       \17┌─────────────────────────┐\07
  49. \1F║     Menu driven HELP and DOCUMENTATION.   ║\07       \17│ User supported software │\07
  50. \1F╙───────────────────────────────────────────╜\07       \17│      by        │\07
  51.                              \17│              │\07
  52.     \4fGENERAL:\07                       \17│ Seaware Corp.        │\07
  53. \0e 1.        Introduction and how to use this Help.   \07   \17│ P.O. Box 1656        │\07
  54. \0e 2.        The user supported concept & ASP.         \07   \17│ Delray Beach, FL 33444    │\07
  55. \0e 3.        BAT-BBS information. On-line users forum.\07   \17│ 407/738-1712        │\07
  56. \0e 4.        What EBL is... an introduction!         \07   \17│             │\07
  57. \0e 5.        EBL PLUS: The inside story!          \07   \17│ Order your registered    │\07
  58.                              \17│ copy for $79 + $3 s/h   │\07
  59.      \4fThe EBL PLUS Language\07               \17│ from us directly or our │\07
  60. \0e 6.        Showing things on the display.         \07   \17│ order line 800/634-8188 │\07
  61. \0e 7.        Reading data from users.             \07   \17│ (MC/Visa welcome)    │\07
  62. \0e 8.        Controlling program flow             \07   \17│             │\07
  63. \0e 9.        Using the keyboard stack.             \07   \17│ Please copy and share    │\07
  64. \0e 10.     Sensing program's results.               \07   \17│ BAT.COM, BATDOC.BAT,    │\07
  65. \0e 11.     Assignment statements.             \07   \17│ and BATDEMO.BAT for    │\07
  66. \0e 12.     Debugging aids.                 \07   \17│ non-commercial uses    │\07
  67. \0e 13.     Extended functions:              \07   \17│ only.            │\07
  68.        \0eConsole\07 \0eString\07 \0eSystem\07 \0eControl\07 \0eAdd-on\07       \17└─────────────────────────┘\07
  69. \0e 14.     Additional information.             \07
  70. \0e X.        eXit.                     \07
  71.  
  72.     Select the starting topic and press ─┘
  73. END
  74.  
  75. -entry0
  76.     %o =
  77.     if left(%F,3) = "opt" then field( ( ( %F $ 4 ) + 1 ) )
  78.     %A = Select( color( yellow ), color( black on white ))
  79.     if %R > 20 then goto -entry0
  80.     if %A = Enter then %F = "opt" & %R | goto -%F
  81.     if %A = ESC   then goto -opt0
  82.     if Length(%A) > 1 then beep
  83.     goto -entry0
  84.  
  85. -opt20    ********** Display final EXIT window ***********
  86. -opt0    color yellow on black  |* Setup the window contents
  87.     type left(field(1, color(black on white)),51) |* change b/w colored bar to yellow
  88.     color white on blue
  89.     window( 18, 13, 48, 20)
  90.     type "Ready to leave on-line help!"
  91.     color Cyan on blue
  92.     type "Make selection & press ─┘"
  93.     type
  94.     colorchar . as color( yellow on blue)
  95.     type ". Exit . . Demo . .Return."
  96.     colorchar
  97.     %A = "" | %F = ""
  98.         ** Now actually do the bouncing bar menu **
  99. -End1    type " Exit to DOS               " | If %A = Enter then exit
  100. -Endit    %A = select( color( yellow on blue), color( black on white ), Arrow)
  101.     if %A = Esc then goto -line0
  102.     goto -End%R
  103. -End2    type " Demonstrate other features" | If %A = Enter then stack "BATDEMO" |exit
  104.          else goto -endit
  105. -End3    type " Return to on-line help    " | If %A = Enter then goto -line0
  106.          else goto -endit
  107.  
  108. -line100 *************** Begin various chapters to show ****************
  109. -opt1    %h = INTRODUCTION | %i = 100 | call -header
  110.     begtype
  111.     This program will provide you with help information on the use of
  112. the EXTENDED BATCH LANGUAGE PLUS.  It is designed to allow for
  113. easy access and retrieval of information that would be harder to find
  114. by more conventional means.
  115.  
  116.     The information is broken up into multiple sections.  Each section
  117. may have several pages.  To access each page in order, just keep
  118. pressing the PGDN key.    At the top of your screen is the name of the
  119. section which you are in and the page number.
  120.  
  121. ~Note:~
  122.  
  123.     If you wish to directly enter another section now, press the ~HOME~
  124. key to return to the main menu, enter the proper ~section number~ and
  125. press the ~─┘~ key.
  126.  
  127. end
  128.      goto -scroll
  129. -line101 call -header | begtype
  130. While in any of these sections, there are just three keys needed:
  131.  
  132. PGDN -    This key will advance to the next page of any section. If
  133.     there are no more pages in the section, then it will advance
  134.     to the next section.
  135.  
  136. PGUP -    This key will back up to a previous page within a section.
  137.     If there are no more previous pages within a section, it
  138.     will backup to the previous section.
  139.  
  140. HOME or ESC - Either of these keys will return directly to the
  141.     main menu. From the menu, any section can be looked at
  142.     directly by entering the section number and pressing ─┘.
  143. end
  144.     goto -scroll
  145. -line199 %i = 102
  146. -line102 call -header | begtype
  147.   There are several sections where you will be given questions and answers.
  148. If you would like to peek and see answer without specifically answering it,
  149. you can press the space bar to reveal the answer letter by letter.
  150.  
  151.     One interesting facet you should know while using this on-line help
  152. and documentation is that you are using the EXTENDED BATCH LANGUAGE
  153. program to display and control these menus.
  154.  
  155.     Never before has a batch language been so powerful on the IBM
  156. personal computer as to be able to provide a facility like this.  In
  157. the following pages of description, we hope that you will see, as we
  158. did, that this program has extraordinary capability which does much
  159. more than just expand the capability of DOS.  In fact, it gives new
  160. power to your system by providing capabilities never before possible.
  161. end
  162.     goto -scroll
  163. -opt2
  164. -line103 %i = 200
  165. -line200 %H = "The User Supported Concept & ASP" | call -header | begtype
  166.  
  167.  ╓─                                     ─╖
  168.  ║    The license fee for Extended Batch Language-Plus is $79 + $3 s/h      ║
  169.  ║                                      ║
  170.  ║ You are encouraged to copy and share BAT.COM, BATDOC.BAT, and      ║
  171.  ║ BATDEMO.BAT for non-commercial purposes only. You must not modify      ║
  172.  ║ any of these files or make a profit from their distribution.       ║
  173.  ║                                      ║
  174.  ║ In appreciation of your support, you will be provided with printed      ║
  175.  ║ documentation, examples, and samples of add-ons to the EBL language      ║
  176.  ║ (including source code).  All registered users can also access the      ║
  177.  ║ BAT-BBS, a hot-line for assistance, tips, and updates.          ║
  178.  ║                                      ║
  179.  ╙─     (c) Copyright 1982 through 1990 by Seaware Corp.         ─╜
  180.               All rights reserved.
  181.  
  182.   Seaware Corp.                            407/738-1712
  183.   Post Office Box 1656                           800/634-8188
  184.   Delray Beach, FL 33444
  185. end
  186.     goto -scroll
  187. -line201 call -header | begtype
  188. When you order EBL-PLUS, you will receive:
  189.  
  190.  ■ A detailed users guide.  This hardcopy manual has about 250 pages of
  191.                 descriptions, examples, useful utilities, and
  192.                 tips on this program's use.
  193.  
  194.  ■ The EBL-PLUS Diskette    Containing the latest program version,
  195.                 useful utilities, help files, and examples.
  196.                 You also receive our "Executive Menu Facility"
  197.                 to get started using EBL with zero effort.
  198.  
  199.  ■ 6 months of free support:
  200.      o    BAT-BBS         An on-line forum for user's ideas, tips,
  201.                 programs, and assistance.
  202.  
  203.      o    Technical Hotline   Phone us if you experience problems.
  204.  
  205.      o    "The EBL User"      Our Newsletter provides information, tips, and
  206.                 and ideas on how to apply EBL-Plus to your needs.
  207. end
  208.      goto -scroll
  209. -line202 call -header | begtype
  210.  
  211. An Extended support subscription is available for a nominal fee.
  212.  
  213. All users are invited to use the BAT-BBS, (See next section for more
  214. information).  Our users have signed on thousands of times and testified
  215. that this service has helped make Extended Batch Language-PLUS one of their
  216. best supported programs on their system.
  217.  
  218. The concept of excellent user support is buried deep in our roots.  Much of
  219. our philosophy was founded by Andrew Fugleman at Headlands Press, Inc.    I
  220. would like to thank Andrew for his inspiration and help.  Because I feel
  221. that good software should have someone standing behind it, we at Seaware
  222. want to put your patronage directly into support for you as our thanks of
  223. your support of us.  You will find it well worth it.
  224.  
  225.      Seaware Corp. ≡≡≡≡ Post Office Box 1656 ≡≡≡≡ Delray Beach, FL 33444
  226.            ≡≡≡≡     800/634-8188     ≡≡≡≡
  227. end
  228.      goto -scroll
  229. -line299 %i = 203
  230. -line203 %H = "The User Supported Concept & ASP" |call -header | begtype
  231. Seaware is a member of the Association of Shareware Professionals, a
  232. non-profit group dedicated to promoting the shareware concept
  233. (try-before-you-buy software) as a unique marketing alternative to
  234. traditional retail distribution.  We agreed to do our best to handle
  235. customer complaints when we joined ASP.
  236.  
  237. We're committed to solve your problems quickly, and to your liking.  But
  238. if you feel like you got the short end of the stick, you can take your
  239. complaint to the ASP Ombudsman.  We'll abide by the Ombudsman's final
  240. decision on your matter, no matter what the outcome.  You have our word
  241. on it.
  242.  
  243. ASP wants to make sure that the shareware principle works for you.  If
  244. you are unable to resolve a shareware-related problem with an ASP member
  245. by contacting the member directly, ASP may be able to help.  The ASP
  246. Ombudsman can help you resolve a dispute or problem with an ASP member,
  247. but does not provide technical support for members' products.  Please
  248. write to the ASP Ombudsman at P.O.  Box 5786, Bellevue, WA 98006 or send
  249. a Compuserve message via easyplex to ASP Ombudsman 70007,3536".
  250. end
  251.     goto -scroll
  252. -opt3
  253. -line204 %i = 300
  254. -line300 %H = "BAT - BBS" | call -header | begtype
  255.  
  256. One of the special services we provide to EBL PLUS users
  257. is through a communication medium called "BAT-BBS". This is
  258. a direct link from you to other users, as well as Seaware.
  259.  
  260. The following list shows the many things that
  261.  
  262.     BAT-BBS can provide .  .  .
  263.  
  264. end
  265.     goto -scroll
  266. -line301 call -header | begtype
  267. FOR USERS WITH A MODEM:
  268.  
  269.     * Receive program updates as soon as they are available!
  270.  
  271.     * BAT-BBS is a hotline for your questions!
  272.  
  273.     * Directly access our computer at Seaware via phone.
  274.  
  275.     * It will be ready to give helpful ideas.
  276.  
  277.     * Programs and Utilities are available to download.
  278.  
  279.     * Users are welcome to upload their programs/ideas.
  280.  
  281.     * Tips and techniques are on-line.
  282.  
  283.     * Converse with other users and program author via
  284.         electronic mail.
  285. end
  286.     goto -scroll
  287. -line302 call -header | begtype
  288.  
  289. IF YOU DON'T HAVE A MODEM:
  290.  
  291.     * You can still phone the BAT-BBS if you wish to
  292.       have your questions answered via voice.  A
  293.       recorder will take your message.
  294. end
  295.     goto -scroll
  296. -line399 %i = 303
  297. -line303 call -header | begtype
  298.  
  299. You can access the bulletin board service by using any 300 baud to 2400
  300. baud modem with your computer.    You can use 8,N,1 or 7,E,1 protocols.
  301.  
  302. You will also need a communication program such as PROCOMM, CROSSTALK,
  303. QMODEM, or SmartCom.  Contact your local computer store if you need more
  304. information or help with communication equipment or software.
  305.  
  306. Service is available 24 Hours a day.  Your personal password will be
  307. supplied when you register.
  308.  
  309. end
  310. goto -scroll
  311. -opt4
  312. -line304 %i = 400
  313. -line400 %H = "Introduction" | call -header | begtype
  314.   EBL is short for Extended Batch Language.  EBL PLUS is a powerful
  315. productivity tool for the IBM Personal Computer.  It represents a
  316. significant advance in providing a comprehensive yet easy to learn and use
  317. facility for controlling tasks you give your computer.    It can even give
  318. you on-line documentation SUCH AS THIS!
  319.  
  320.   EBL is a command programming language.  It is a high level language that
  321. can be used as a direct replacement or in conjunction with DOS batch files.
  322. It can operate with IBM PC-DOS versions 2.0 through 4.x and OS/2 1.x real
  323. mode.  Compared with standard PC-DOS batch files, EBL has superior control
  324. structures, string handling, and user interfaces.  It also has tracing
  325. facilities, and is easy to learn and use.  Many aspects of the language are
  326. like BASIC.  Users of VM/370 will also find it similar to EXEC2.  It seems
  327. that both "end users" and programmers find BAT a simple and effective
  328. language.
  329.  
  330. end
  331.     goto -scroll
  332. -line401 call -header | begtype
  333. With Extended Batch Language, you can have:
  334.  
  335. -    Better control of messages to the screen
  336.  
  337. -    Accept responses from the user and create responses to programs
  338.  
  339. -    String handling operations (substring, length, etc.)
  340.  
  341. -    Arithmetic expressions and assignments
  342.  
  343. -    Comparisons and program return codes
  344.  
  345. -    Search for files or tell if they exist
  346.  
  347. -    Complete freedom to mix DOS and BAT commands within the same control file
  348.  
  349.  
  350. Let's look at how it measures up to today's DOS......
  351. end
  352.     goto -scroll
  353. -line402 call -header | begtype
  354. Function       DOS 2.0 to 4.x      Extended Batch Lang.
  355. ----------       --------------      --------------------
  356. BEEP                       X
  357. CALL/RTN           Limited           X
  358. CLS               X           X
  359. BEGSTACK                   X
  360. BEGTYPE                    X
  361. EXIT               X           X
  362. GOTO               X           X
  363. IF               Limited           X
  364. INKEY/READ                   X
  365. READSCRN                   X
  366. STACK                       X
  367. TYPE               X           X
  368. TRACE                       X
  369. Assignments                   X
  370. Global Variables               X
  371. Return Codes           X           X
  372. Windows                    X
  373. end
  374.     goto -scroll
  375. -line403 call -header | begtype
  376.   As you can see from the previous chart, EBL PLUS has more
  377. power and enhanced capabilities than any version of DOS!.  This
  378. program uses these capabilities to solve common problems for......
  379.  
  380.   The system programmer - who needs to do long sequences of tasks between
  381. linker, compilers, debuggers, and editors.  He can now create an
  382. intelligent link between these programs.  For instance, he may wish to do a
  383. link depending on if the previous compile was successful.  He can also
  384. respond automatically from a keyboard "stack" into various utilities.
  385.  
  386.   The secretary - who has several types of tasks to perform (word
  387. processing, accounting packages, etc) and requires a simple way of changing
  388. from one type of task to another, perhaps with optional help text.
  389.  
  390.   The student - who wishes to go from one game to another without having to
  391. learn the system commands required to make each available.
  392.  
  393.   Testers - who wish to automate long, boring tests and procedures on the
  394. personal computer. An excellent tool for a manufacturing line.
  395. end
  396.     goto -scroll
  397. -line499 %i = 404
  398. -line404 call -header | begtype
  399.  
  400.     The effect of using EBL is to put "covers" on the programs and system
  401. that it controls.  In UNIX they call it shells, in VM they call it EXECs,
  402. but to you it simply makes things friendly.  Described in these pages is a
  403. solution to batch files through the use of Extended Batch Language.  A
  404. friendly interface to you can now be easily created.
  405.  
  406.   Once you have looked over the descriptions of each command, browse
  407. through the BATDEMO.BAT file and look at the commands in operation.  By
  408. trying out some sample programs, you should be able to gain a full
  409. understand of how to write some powerful batch files by using Extended
  410. Batch Language.
  411.  
  412.  
  413.  
  414. Copyright (c) 1982 to 1990 by Seaware Corp.           Program by
  415. All Rights reserved by Seaware Corp.               Frank Canova
  416.  
  417. end
  418.      goto -scroll
  419. -opt5
  420. -line405 %i = 500
  421. -line500 %H = "EBL PLUS: The inside story!" | call -header| begtype
  422. We rewrote the book!  Almost everything you could possible have is now
  423. in Extended Batch Language-PLUS.  We took time in getting everyone's
  424. suggestions into it, and used very little memory in doing it.
  425.  
  426.      *     Menus are  easy to create.  Just use the "Executive Menu
  427.      Facility" to create customized menus the way YOU want to
  428.      see  them.  This  automatic  procedure,  written in EBL,
  429.      will create a    custom    menu  without ever having to know
  430.      any  details  about  the  EBL    Language or batch  files.
  431.      Using your PC couldn't be easier!
  432.  
  433.      *     Create the  "Look-and-feel"  of  your  choice.  Colorful
  434.      windows  that use bouncing bar selections, pop-ups, fill
  435.      in the blank fields, and action bars are easily created.
  436.  
  437.      *     Complete freedom with    all variables.    Strings can be up
  438.      to 255 characters mixed  case, numbers to 19 digits. Use
  439.      EBL-Plus's  English-like  commands  to  integrate appli-
  440.      cations together, set up printers, or automate programs.
  441. end
  442.     goto -scroll
  443. -line501 call -header | begtype
  444.      *     Extended functions give you  additional  power where you
  445.      need    it.  Intended  for  programmers  needing  special
  446.      capabilities,    several types of functions are available:
  447.      DOS  support (CHDIR,  MKDIR,  REBOOT), low  level system
  448.      support  (PEEK,  POKE,  INT86), string  support  (STRIP,
  449.      LOWER, UPPER), and MUCH more... all built into EBL-PLUS.
  450.  
  451.      *     Create your own Add-On  functions  to EBL. If    you  have
  452.      special ideas for  the EBL language, you can create them
  453.      using    MASM,  C,  Pascal,  etc.  The    source    code  for
  454.      Seaware's add-on  functions (written in Turbo Pascal and
  455.      MASM) is provided as an example to registered users. Our
  456.      samples show you how to reserve from 0 to  64K of memory
  457.      for "extended variables" that can have long  descriptive
  458.      names and create arrays.  And    for floating point arith-
  459.      metic, just load the Turbo Pascal BCD Math add-on.
  460. end
  461.     goto -scroll
  462. -line599 %i = 502
  463. -line502 call -header | begtype
  464.      *     Full support for many more environments like PC Network,
  465.      TopView, Windows, DESQview and of course DOS 2 to DOS 4.
  466.      Now EBL Plus even supports OS/2 and 4DOS!
  467.  
  468.      *     File I/O is  easy within EBL PLUS. Use it to  setup
  469.      printers,  keep  configuration  information,  initialize
  470.      programs, or even create other batch files!
  471.  
  472.      *     Error recovery is now available  within batch files!  In
  473.      cases where  an error    is  detected  while the EBL batch
  474.      file  is  running,  you  can  now  include a  routine to
  475.      recover gracefully from the problem.
  476. end
  477.      goto -scroll
  478.  
  479. -on.error-
  480.     %e = %e + 1 | if %e > 2 then %L = ? | skip 5
  481.     if %R <> 6 then skip 7
  482.     %G = .goto.
  483.     color 8F | type "Loading part 2 ..."
  484.     leave
  485.     batdoc2
  486. bat *
  487. bat beep type "ERROR! BATDOC2.BAT overlay is missing!" | exit
  488. bat exit
  489. begtype
  490.  
  491.      Unexpected error \%S%R in line \%S%L !
  492.  
  493.      This batch file was error free when it was distributed
  494.      by Seaware. An error indicates that it was most likely
  495.      modified by someone improperly. To get an updated demo
  496.      diskette send $10 to Seaware directly or call 800/634-8188
  497.      or 407/738-1712.
  498.  
  499.  
  500.             Seaware Corp.
  501.              Post Office Box 1656
  502.             Delray Beach, FL 33444
  503. end
  504. %G =
  505. %E = 0
  506. -end%R exit
  507.